home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / qbbs / qbbs276s.zip / RICK-L.ZIP / MAIN-DIR.ZIP / CHKFILES.BAT < prev    next >
DOS Batch File  |  1993-01-16  |  8KB  |  288 lines
  1. rem > d:\chkfiles.!!!
  2. XU PORT:1:ON
  3. AT COM2:H1
  4. WAIT 1
  5. AT COM2:M0
  6. ECHO Running CHKFILES
  7. goto loop
  8.  
  9. :LOOP
  10. CD \QUICK
  11. mailtoss -k -f -c -p -l
  12. IF EXIST 7559*.* RED D:\QUICK\7559*.* D:\QUICK\FILES
  13. IF EXIST D:\QUICK\FILES\7559*.* GOTO QMXMAIL
  14. IF EXIST D:\QUICK\FILES\75C5*.* GOTO QMXMAIL
  15. IF EXIST \QMX\*.* GOTO QMXMAIL
  16. IF EXIST FILEDOOR.UPD FD_UPD
  17.  
  18. CD \QUICK\FILES
  19. IF EXIST FIDO*.NA COPY FIDO*.NA E:\MSNEW
  20. IF EXIST FIDO*.NA DEL FIDO*.NA
  21. IF NOT EXIST *.* GOTO END
  22. SPAZ -D -F -O -V . *.*
  23. IF EXIST NODELIST.* GOTO LOOP1
  24. IF EXIST NODEDIFF.* GOTO LOOP1
  25. IF EXIST FMLYLIST.* GOTO LOOP1
  26. IF EXIST FMLYDIFF.* GOTO LOOP1
  27. IF EXIST MAILLIST.* GOTO LOOP1
  28. IF EXIST MAILDIFF.* GOTO LOOP1
  29. IF EXIST ENETLIST.* GOTO LOOP1
  30. IF EXIST ENETDIFF.* GOTO LOOP1
  31. IF EXIST DNETLIST.* GOTO LOOP1
  32. IF EXIST DNETDIFF.* GOTO LOOP1
  33. IF EXIST QBSNODES.* GOTO LOOP1
  34. IF EXIST DBNET.* GOTO LOOP1
  35. IF EXIST JESUSBBS.* GOTO LOOP1
  36. GOTO LOOP2
  37.  
  38. :LOOP1
  39. IF EXIST NODELIST.* COPY NODELIST.* E:\NLIST
  40. IF EXIST NODEDIFF.* COPY NODEDIFF.* E:\NLIST
  41. IF EXIST FMLYLIST.* COPY FMLYLIST.* E:\NLIST
  42. IF EXIST FMLYDIFF.* COPY FMLYDIFF.* E:\NLIST
  43. IF EXIST MAILLIST.* COPY MAILLIST.* E:\NLIST
  44. IF EXIST MAILDIFF.* COPY MAILDIFF.* E:\NLIST
  45. IF EXIST ENETLIST.* COPY ENETLIST.* E:\NLIST
  46. IF EXIST ENETDIFF.* COPY ENETDIFF.* E:\NLIST
  47. IF EXIST DNETLIST.* COPY DNETLIST.* E:\NLIST
  48. IF EXIST DNETDIFF.* COPY DNETDIFF.* E:\NLIST
  49. IF EXIST QBSNODES.* COPY QBSNODES.* E:\NLIST
  50. IF EXIST DBNET.* COPY DBNET.* E:\NLIST
  51. IF EXIST DBNET.* COPY DBNET.* D:\DBRIDGE
  52. IF EXIST NODELIST.* COPY NODELIST.* D:\NODELIST
  53. IF EXIST NODEDIFF.* COPY NODEDIFF.* D:\NODELIST
  54. IF EXIST FMLYLIST.* COPY FMLYLIST.* D:\NODELIST
  55. IF EXIST FMLYDIFF.* COPY FMLYDIFF.* D:\NODELIST
  56. IF EXIST MAILLIST.* COPY MAILLIST.* D:\NODELIST
  57. IF EXIST MAILDIFF.* COPY MAILDIFF.* D:\NODELIST
  58. IF EXIST ENETLIST.* COPY ENETLIST.* D:\NODELIST
  59. IF EXIST ENETDIFF.* COPY ENETDIFF.* D:\NODELIST
  60. IF EXIST DNETLIST.* COPY DNETLIST.* D:\NODELIST
  61. IF EXIST DNETDIFF.* COPY DNETDIFF.* D:\NODELIST
  62. IF EXIST QBSNODES.* COPY QBSNODES.* D:\NODELIST
  63. IF EXIST DBNET.* COPY DBNET.* D:\NODELIST
  64.  
  65. IF EXIST JESUSBBS.* GOTO JESUSBBS
  66. IF EXIST *.TIC GOTO TICK
  67. IF EXIST NODELIST.* RED NODELIST.* HOLD
  68. IF EXIST NODEDIFF.* RED NODEDIFF.* HOLD
  69. IF EXIST FMLYLIST.* RED FMLYLIST.* HOLD
  70. IF EXIST FMLYDIFF.* RED FMLYDIFF.* HOLD
  71. IF EXIST MAILLIST.* RED MAILLIST.* HOLD
  72. IF EXIST MAILDIFF.* RED MAILDIFF.* HOLD
  73. IF EXIST ENETLIST.* RED ENETLIST.* HOLD
  74. IF EXIST ENETDIFF.* RED ENETDIFF.* HOLD
  75. IF EXIST DNETLIST.* RED DNETLIST.* HOLD
  76. IF EXIST DNETDIFF.* RED DNETDIFF.* HOLD
  77. IF EXIST QBSNODES.* RED QBSNODES.* HOLD
  78. IF EXIST DBNET.* RED DBNET.* HOLD
  79.  
  80.  
  81. GOTO NODEDIFF
  82.  
  83. :LOOP2
  84. IF EXIST *.TIC GOTO TICK
  85. IF EXIST FNEWS*.* GOTO FNEWS
  86. IF EXIST CASTLE.ZIP REN CASTLE.ZIP CLFILES.ZIP
  87. IF EXIST ??FILES.ZIP GOTO FILES
  88. IF EXIST CA-TIM.ZIP GOTO TIM
  89.  
  90. E:
  91. CD \MSUPS
  92. IF EXIST e:\MSUPS\384-3LST.ZIP GOTO MEGALIST
  93. GOTO END
  94.  
  95. rem ---------------------------file handling-------------------------
  96.  
  97. :NODEDIFF
  98. echo The Label is NODEDIFF
  99. D:
  100. CD \NODELIST
  101. IF EXIST NODEDIFF.* CALL FIDOUPD.BAT
  102. IF EXIST FMLYDIFF.* CALL NETUPD.BAT
  103. IF EXIST MAILDIFF.* CALL MAILUPD.BAT
  104. IF EXIST ENDIFFNA.* CALL ENUPD.BAT
  105. IF EXIST ENETDIFF.* CALL ENETUPD.BAT
  106. IF EXIST AGAPDIFF.* CALL AGAPUPD.BAT
  107. IF EXIST IPECDIFF.* CALL IPECUPD.BAT
  108. IF EXIST DNETDIFF.* CALL DNETUPD.BAT
  109. xarc /o *.*
  110. PKUNZIP -o *.Z*
  111. red *.a* hold
  112. red *.z* hold
  113. reN gold*.A?? GOLD*.$??
  114. call xlax
  115. fdel cut E:\NLIST\????list.* 1
  116. fdel cut E:\NLIST\????diff.* 2
  117. fdel cut E:\NLIST\???list.* 1
  118. fdel cut E:\NLIST\???diff.* 2
  119. fdel cut E:\NLIST\??list*.* 1
  120. fdel cut E:\NLIST\??diff*.* 2
  121. fdel cut E:\NLIST\dbnet.* 1
  122. FDEL CUT E:\NLIST\QBSNODES.* 1
  123. REN GOLD*.$?? GOLD*.A*
  124. GOTO LOOP
  125.  
  126. :FNEWS
  127. ECHO The label is FNEWS
  128. DEL D:\QUICK\TXTFILES\BULLETF.ASC
  129. CD \QUICK\FILES
  130. TOZIP FNEWS*.*
  131. PKZIP -U -Z FNEWS* < C:\APND\COMMENT.TXT
  132. COPY D:\QUICK\FILES\FNEWS*.ZIP \DOWN\MNEWS
  133. PKUNZIP -O FNEWS D:\QUICK\TXTFILES
  134. REN D:\QUICK\TXTFILES\FIDO*.NWS FNEWS.TXT
  135. STRIPFF D:\QUICK\TXTFILES\FNEWS.TXT D:\QUICK\TXTFILES\BULLETF.ASC
  136. DEL D:\QUICK\TXTFILES\FNEWS.TXT
  137. DEL D:\QUICK\FILES\FNEWS*.*
  138. GOTO LOOP
  139.  
  140. :MEGALIST
  141. ECHO The label is MEGALIST
  142. copy e:\MSUPS\384-3LST.ZIP c:\MSCOMM
  143. DEL e:\MSUPS\384-3LST.ZIP
  144. GOTO LOOP
  145.  
  146. rem :JESUSBBS
  147. rem ECHO The label is JESUSBBS
  148. rem FDEL CUT E:\NLIST\JESUSBBS.* 1
  149. rem DEL D:\QUICK\TXTFILES\BULLET3.ASC
  150. rem PKUNPAK D:\QUICK\FILES\JESUSBBS.* D:\QUICK\TXTFILES\
  151. rem REN D:\QUICK\TXTFILES\JESUSBBS.* BULLET3.ASC
  152. rem GOTO TICK
  153.  
  154. :FILES
  155. echo The label is FILES
  156. MD \TEMP-DFB
  157.  
  158. :ENDFILES
  159. CD\QUICK\FILES
  160. ECHO Y | DEL \TEMP-DFB\*.*
  161. wait 3
  162. IF EXIST CLFILES.ZIP GOTO CLFILES
  163. IF EXIST SSFILES.ZIP GOTO SSFILES
  164. IF EXIST DBFILES.ZIP GOTO DBFILES
  165. IF EXIST SLFILES.ZIP GOTO SLFILES
  166. IF EXIST MCFILES.ZIP GOTO MCFILES
  167. IF EXIST STFILES.ZIP GOTO STFILES
  168. ECHO Y | DEL \TEMP-DFB
  169. RD \TEMP-DFB
  170. wait 3
  171. GOTO LOOP
  172.  
  173. :CLFILES
  174. d:
  175. CD \QUICK\FILES
  176. PKUNZIP -o CLFILES.ZIP \TEMP-DFB
  177. PKZIP -! -U -Z C:\DOWN\FILELIST\CLFILES \TEMP-DBF <C:\APND\COMMENT.TXT
  178. REN \TEMP-DFB\*.* 5504-50.DFB
  179. COPY \TEMP-DFB\5504-50.DFB D:\DBRIDGE\DFB
  180. DEL \TEMP-DFB\5504-50.DFB
  181. DEL CLFILES.ZIP
  182. REM > D:\DBRIDGE\FILEBASE.DFB
  183. GOTO ENDFILES
  184.  
  185. :DBFILES
  186. d:
  187. CD \QUICK\FILES
  188. PKUNZIP -o DBFILES.ZIP \TEMP-DFB
  189. PKZIP -! -U -Z C:\DOWN\FILELIST\DBFILES \TEMP-DBF <C:\APND\COMMENT.TXT
  190. REN \TEMP-DFB\*.* 384-1.DFB
  191. COPY \TEMP-DFB\384-1.DFB D:\DBRIDGE\DFB
  192. DEL \TEMP-DFB\384-1.DFB
  193. DEL DBFILES.ZIP
  194. REM > D:\DBRIDGE\FILEBASE.DFB
  195. GOTO ENDFILES
  196.  
  197. :SLFILES
  198. d:
  199. CD \QUICK\FILES
  200. PKUNZIP -o SLFILES.ZIP \TEMP-DFB
  201. PKZIP -! -U -Z C:\DOWN\FILELIST\SLFILES \TEMP-DBF <C:\APND\COMMENT.TXT
  202. REN \TEMP-DFB\*.* 5504-52.DFB
  203. COPY \TEMP-DFB\5504-52.DFB D:\DBRIDGE\DFB
  204. DEL \TEMP-DFB\5504-52.DFB
  205. DEL SLFILES.ZIP
  206. REM > D:\DBRIDGE\FILEBASE.DFB
  207. GOTO ENDFILES
  208.  
  209. :SSFILES
  210. d:
  211. CD \QUICK\FILES
  212. PKUNZIP -o SSFILES.ZIP \TEMP-DFB
  213. PKZIP -! -U -Z C:\DOWN\FILELIST\SSFILES \TEMP-DBF <C:\APND\COMMENT.TXT
  214. REN \TEMP-DFB\*.* 384-10.DFB
  215. COPY \TEMP-DFB\384-10.DFB D:\DBRIDGE\DFB
  216. DEL \TEMP-DFB\384-10.DFB
  217. DEL SSFILES.ZIP
  218. REM > D:\DBRIDGE\FILEBASE.DFB
  219. GOTO ENDFILES
  220.  
  221. :MCFILES
  222. d:
  223. CD \QUICK\FILES
  224. PKUNZIP -o MCFILES.ZIP \TEMP-DFB
  225. PKZIP -! -U -Z C:\DOWN\FILELIST\MCFILES \TEMP-DBF <C:\APND\COMMENT.TXT
  226. REN \TEMP-DFB\*.* 384-4.DFB
  227. COPY \TEMP-DFB\384-4.DFB D:\DBRIDGE\DFB
  228. DEL \TEMP-DFB\384-4.DFB
  229. DEL MCFILES.ZIP
  230. REM > D:\DBRIDGE\FILEBASE.DFB
  231. GOTO ENDFILES
  232.  
  233. :STFILES
  234. d:
  235. CD \QUICK\FILES
  236. PKUNZIP -o STFILES.ZIP \TEMP-DFB
  237. PKZIP -! -U -Z C:\DOWN\FILELIST\STFILES \TEMP-DBF <C:\APND\COMMENT.TXT
  238. REN \TEMP-DFB\*.* 384-7.DFB
  239. COPY \TEMP-DFB\384-7.DFB D:\DBRIDGE\DFB
  240. DEL \TEMP-DFB\384-7.DFB
  241. DEL STFILES.ZIP
  242. REM > D:\DBRIDGE\FILEBASE.DFB
  243. GOTO ENDFILES
  244.  
  245. :QMXMAIL
  246. ECHO The label is QMXMAIL
  247. COPY D:\QMX\*.* D:\QUICK\files
  248. ECHO Y | DEL \QMX\*.*
  249. CD \DBRIDGE\mail
  250. rem qmx-db 1:384/3 X 30425
  251. if not exist 75c5*.* goto loop
  252. DBUTIL NORMAL SEND 384/1 D:\DBRIDGE\MAIL\75C5*.*
  253. GOTO LOOP
  254.  
  255. :TICK
  256. Echo The label is TICK
  257. cd\QUICK\files
  258. IF NOT EXIST SDNWS*.SDN GOTO TICK2
  259. CD\QUICK\TXTFILES
  260. md \tmp$tmp$
  261. PAK -E /wa D:\QUICK\FILES\SDNWS*.SDN \tmp$tmp$
  262. rem COPY \tmp$tmp$\SDNEWS.000+SDNEWS.001+SDNEWS.002+SDNEWS.003+SDNEWS.004+SDNEWS.005+SD SDNWS.ASC
  263. del \tmp$tmp$\sdn*.*
  264. rd \tmp$tmp$
  265.  
  266. :TICK2
  267. MTA D:\QUICK\FILES\*.*
  268. CD\QUICK
  269. call tick
  270. cd\QUICK\files
  271. if exist *.tic ren *.tic *.ti$
  272. goto loop
  273.  
  274. :TIM
  275. CD\QUICK
  276. COPY FILES\CA-TIM.ZIP TXTFILES
  277. DEL FILES\CA-TIM.ZIP
  278. CD TXTFILES
  279. PKUNZIP -O CA-TIM
  280. GOTO LOOP
  281.  
  282. rem ------------------------------------end---------------------------
  283.  
  284. :END
  285. d:
  286. del \chkfiles.!!!
  287. cd\qnode1
  288.